VERSION 5.00
Begin {C0E45035-5775-11D0-B388-00A0C9055D8E} Dte 
   ClientHeight    =   9630
   ClientLeft      =   0
   ClientTop       =   0
   ClientWidth     =   10305
   _ExtentX        =   18177
   _ExtentY        =   16986
   FolderFlags     =   5
   TypeLibGuid     =   "{32700B3D-07BF-41FB-BE7A-1EC0B519CE6E}"
   TypeInfoGuid    =   "{6056C2EA-18ED-42E1-8C4D-B9CBBED14C5E}"
   TypeInfoCookie  =   0
   Version         =   4
   NumConnections  =   1
   BeginProperty Connection1 
      ConnectionName  =   "Conexion"
      ConnDispId      =   1001
      SourceOfData    =   3
      ConnectionSource=   "Provider=SQLOLEDB.1;Password=sa;Persist Security Info=True;User ID=sa;Initial Catalog=desarrollo;Data Source=127.0.0.1"
      Expanded        =   -1  'True
      IsSQL           =   -1  'True
      QuoteChar       =   34
      SeparatorChar   =   46
   EndProperty
   NumRecordsets   =   10
   BeginProperty Recordset1 
      CommandName     =   "cmdLIstadoSaldos"
      CommDispId      =   1002
      RsDispId        =   1060
      CommandText     =   $"Dte.dsx":0000
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   7
      BeginProperty Field1 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "nombreorazonsocial"
         Caption         =   "nombreorazonsocial"
      EndProperty
      BeginProperty Field2 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "domicilio"
         Caption         =   "domicilio"
      EndProperty
      BeginProperty Field3 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "telefono"
         Caption         =   "telefono"
      EndProperty
      BeginProperty Field4 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "saldo"
         Caption         =   "saldo"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "Cuit"
         Caption         =   "Cuit"
      EndProperty
      BeginProperty Field6 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "nombre"
         Caption         =   "nombre"
      EndProperty
      BeginProperty Field7 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "prov"
         Caption         =   "prov"
      EndProperty
      NumGroups       =   0
      ParamCount      =   0
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset2 
      CommandName     =   "cmdLIstadoSaldosChico"
      CommDispId      =   1030
      RsDispId        =   1039
      CommandText     =   "dbo.ListadoSaldosChico"
      ActiveConnectionName=   "Conexion"
      CommandType     =   2
      dbObjectType    =   2
      IsRSReturning   =   -1  'True
      NumFields       =   4
      BeginProperty Field1 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "Nombreorazonsocial"
         Caption         =   "Nombreorazonsocial"
      EndProperty
      BeginProperty Field2 
         Precision       =   5
         Size            =   2
         Scale           =   0
         Type            =   2
         Name            =   "id_ciudad"
         Caption         =   "id_ciudad"
      EndProperty
      BeginProperty Field3 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "nombre"
         Caption         =   "nombre"
      EndProperty
      BeginProperty Field4 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "Saldo"
         Caption         =   "Saldo"
      EndProperty
      NumGroups       =   0
      ParamCount      =   0
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset3 
      CommandName     =   "cmdResumen"
      CommDispId      =   1047
      RsDispId        =   1078
      CommandText     =   $"Dte.dsx":0140
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      GroupingName    =   "cmdResumen_Grouping"
      GrandTotal      =   "Res"
      IsRSReturning   =   -1  'True
      NumFields       =   10
      BeginProperty Field1 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "id_cliente"
         Caption         =   "id_cliente"
      EndProperty
      BeginProperty Field2 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "nombreorazonsocial"
         Caption         =   "nombreorazonsocial"
      EndProperty
      BeginProperty Field3 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "nombre"
         Caption         =   "nombre"
      EndProperty
      BeginProperty Field4 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "saldo"
         Caption         =   "saldo"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "domicilio"
         Caption         =   "domicilio"
      EndProperty
      BeginProperty Field6 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "cuit"
         Caption         =   "cuit"
      EndProperty
      BeginProperty Field7 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "telefono"
         Caption         =   "telefono"
      EndProperty
      BeginProperty Field8 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "saldoanterior"
         Caption         =   "saldoanterior"
      EndProperty
      BeginProperty Field9 
         Precision       =   0
         Size            =   10
         Scale           =   0
         Type            =   200
         Name            =   "periododel"
         Caption         =   "periododel"
      EndProperty
      BeginProperty Field10 
         Precision       =   0
         Size            =   9
         Scale           =   0
         Type            =   200
         Name            =   "periodoal"
         Caption         =   "periodoal"
      EndProperty
      NumGroups       =   0
      ParamCount      =   0
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset4 
      CommandName     =   "cmdResumenDetalle"
      CommDispId      =   -1
      RsDispId        =   -1
      CommandText     =   $"Dte.dsx":0276
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      RelateToParent  =   -1  'True
      ParentCommandName=   "cmdResumen"
      IsRSReturning   =   -1  'True
      NumFields       =   10
      BeginProperty Field1 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "id_cliente"
         Caption         =   "id_cliente"
      EndProperty
      BeginProperty Field2 
         Precision       =   18
         Size            =   19
         Scale           =   0
         Type            =   131
         Name            =   "nro_transaccion"
         Caption         =   "nro_transaccion"
      EndProperty
      BeginProperty Field3 
         Precision       =   5
         Size            =   2
         Scale           =   0
         Type            =   2
         Name            =   "tipo"
         Caption         =   "tipo"
      EndProperty
      BeginProperty Field4 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "fecha"
         Caption         =   "fecha"
      EndProperty
      BeginProperty Field5 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "debe"
         Caption         =   "debe"
      EndProperty
      BeginProperty Field6 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "haber"
         Caption         =   "haber"
      EndProperty
      BeginProperty Field7 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   200
         Name            =   "comprobante"
         Caption         =   "comprobante"
      EndProperty
      BeginProperty Field8 
         Precision       =   0
         Size            =   200
         Scale           =   0
         Type            =   202
         Name            =   "concepto"
         Caption         =   "concepto"
      EndProperty
      BeginProperty Field9 
         Precision       =   0
         Size            =   7
         Scale           =   0
         Type            =   200
         Name            =   "contado"
         Caption         =   "contado"
      EndProperty
      BeginProperty Field10 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "saldoacumulado"
         Caption         =   "saldoacumulado"
      EndProperty
      NumGroups       =   0
      ParamCount      =   0
      RelationCount   =   1
      BeginProperty Relation1 
         ParentField     =   "id_cliente"
         ChildField      =   "id_cliente"
         ParentType      =   0
         ChildType       =   0
      EndProperty
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset5 
      CommandName     =   "cmdFactura"
      CommDispId      =   1061
      RsDispId        =   1142
      CommandText     =   $"Dte.dsx":034E
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   14
      BeginProperty Field1 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   20
         Name            =   "fac_numero"
         Caption         =   "fac_numero"
      EndProperty
      BeginProperty Field2 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   200
         Name            =   "numero"
         Caption         =   "numero"
      EndProperty
      BeginProperty Field3 
         Precision       =   0
         Size            =   1
         Scale           =   0
         Type            =   129
         Name            =   "fac_letra"
         Caption         =   "fac_letra"
      EndProperty
      BeginProperty Field4 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   20
         Name            =   "fac_puesto"
         Caption         =   "fac_puesto"
      EndProperty
      BeginProperty Field5 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "fac_fecha"
         Caption         =   "fac_fecha"
      EndProperty
      BeginProperty Field6 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "fac_monto"
         Caption         =   "fac_monto"
      EndProperty
      BeginProperty Field7 
         Precision       =   0
         Size            =   16
         Scale           =   0
         Type            =   200
         Name            =   "fac_contado"
         Caption         =   "fac_contado"
      EndProperty
      BeginProperty Field8 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "id_cliente"
         Caption         =   "id_cliente"
      EndProperty
      BeginProperty Field9 
         Precision       =   0
         Size            =   13
         Scale           =   0
         Type            =   200
         Name            =   "fac_remito"
         Caption         =   "fac_remito"
      EndProperty
      BeginProperty Field10 
         Precision       =   0
         Size            =   200
         Scale           =   0
         Type            =   202
         Name            =   "nombreorazonsocial"
         Caption         =   "nombreorazonsocial"
      EndProperty
      BeginProperty Field11 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "cuit"
         Caption         =   "cuit"
      EndProperty
      BeginProperty Field12 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "cuit"
         Caption         =   "cuit"
      EndProperty
      BeginProperty Field13 
         Precision       =   0
         Size            =   4000
         Scale           =   0
         Type            =   202
         Name            =   "domicilio"
         Caption         =   "domicilio"
      EndProperty
      BeginProperty Field14 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "condicioniva"
         Caption         =   "condicioniva"
      EndProperty
      NumGroups       =   0
      ParamCount      =   3
      BeginProperty P1 
         RealName        =   "Param1"
         Direction       =   1
         Precision       =   19
         Scale           =   0
         Size            =   8
         DataType        =   20
         HostType        =   5
         Required        =   -1  'True
      EndProperty
      BeginProperty P2 
         RealName        =   "Param2"
         Direction       =   1
         Precision       =   255
         Scale           =   255
         Size            =   1
         DataType        =   200
         HostType        =   8
         Required        =   -1  'True
      EndProperty
      BeginProperty P3 
         RealName        =   "Param3"
         Direction       =   1
         Precision       =   19
         Scale           =   0
         Size            =   8
         DataType        =   20
         HostType        =   5
         Required        =   -1  'True
      EndProperty
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset6 
      CommandName     =   "cmdFacturaDetalle"
      CommDispId      =   -1
      RsDispId        =   -1
      CommandText     =   $"Dte.dsx":064D
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      RelateToParent  =   -1  'True
      ParentCommandName=   "cmdFactura"
      Expanded        =   -1  'True
      IsRSReturning   =   -1  'True
      NumFields       =   8
      BeginProperty Field1 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   20
         Name            =   "fac_numero"
         Caption         =   "fac_numero"
      EndProperty
      BeginProperty Field2 
         Precision       =   0
         Size            =   1
         Scale           =   0
         Type            =   129
         Name            =   "fac_letra"
         Caption         =   "fac_letra"
      EndProperty
      BeginProperty Field3 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   20
         Name            =   "fac_puesto"
         Caption         =   "fac_puesto"
      EndProperty
      BeginProperty Field4 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "facd_item"
         Caption         =   "facd_item"
      EndProperty
      BeginProperty Field5 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "pro_codigo"
         Caption         =   "pro_codigo"
      EndProperty
      BeginProperty Field6 
         Precision       =   0
         Size            =   536
         Scale           =   0
         Type            =   200
         Name            =   "pro_Denom"
         Caption         =   "pro_Denom"
      EndProperty
      BeginProperty Field7 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   20
         Name            =   "facd_cantidad"
         Caption         =   "facd_cantidad"
      EndProperty
      BeginProperty Field8 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "facd_precio"
         Caption         =   "facd_precio"
      EndProperty
      NumGroups       =   0
      ParamCount      =   0
      RelationCount   =   3
      BeginProperty Relation1 
         ParentField     =   "fac_numero"
         ChildField      =   "fac_numero"
         ParentType      =   0
         ChildType       =   0
      EndProperty
      BeginProperty Relation2 
         ParentField     =   "fac_letra"
         ChildField      =   "fac_letra"
         ParentType      =   0
         ChildType       =   0
      EndProperty
      BeginProperty Relation3 
         ParentField     =   "fac_puesto"
         ChildField      =   "fac_puesto"
         ParentType      =   0
         ChildType       =   0
      EndProperty
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset7 
      CommandName     =   "cmdTrabajosImprenta"
      CommDispId      =   1079
      RsDispId        =   1149
      CommandText     =   $"Dte.dsx":0879
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      Expanded        =   -1  'True
      IsRSReturning   =   -1  'True
      NumFields       =   11
      BeginProperty Field1 
         Precision       =   0
         Size            =   13
         Scale           =   0
         Type            =   200
         Name            =   "fac_numero"
         Caption         =   "fac_numero"
      EndProperty
      BeginProperty Field2 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "fac_fecha"
         Caption         =   "fac_fecha"
      EndProperty
      BeginProperty Field3 
         Precision       =   0
         Size            =   200
         Scale           =   0
         Type            =   202
         Name            =   "nombreorazonsocial"
         Caption         =   "nombreorazonsocial"
      EndProperty
      BeginProperty Field4 
         Precision       =   0
         Size            =   50
         Scale           =   0
         Type            =   202
         Name            =   "cuit"
         Caption         =   "cuit"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   10
         Scale           =   0
         Type            =   129
         Name            =   "abreviatura"
         Caption         =   "abreviatura"
      EndProperty
      BeginProperty Field6 
         Precision       =   0
         Size            =   300
         Scale           =   0
         Type            =   200
         Name            =   "pro_denom"
         Caption         =   "pro_denom"
      EndProperty
      BeginProperty Field7 
         Precision       =   0
         Size            =   13
         Scale           =   0
         Type            =   200
         Name            =   "desde"
         Caption         =   "desde"
      EndProperty
      BeginProperty Field8 
         Precision       =   0
         Size            =   13
         Scale           =   0
         Type            =   200
         Name            =   "hasta"
         Caption         =   "hasta"
      EndProperty
      BeginProperty Field9 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "facd_precio"
         Caption         =   "facd_precio"
      EndProperty
      BeginProperty Field10 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   20
         Name            =   "facd_cantidad"
         Caption         =   "facd_cantidad"
      EndProperty
      BeginProperty Field11 
         Precision       =   0
         Size            =   300
         Scale           =   0
         Type            =   200
         Name            =   "facd_observ"
         Caption         =   "facd_observ"
      EndProperty
      NumGroups       =   0
      ParamCount      =   4
      BeginProperty P1 
         RealName        =   "Param1"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      BeginProperty P2 
         RealName        =   "Param2"
         Direction       =   1
         Precision       =   23
         Scale           =   3
         Size            =   16
         DataType        =   135
         HostType        =   7
         Required        =   -1  'True
      EndProperty
      BeginProperty P3 
         RealName        =   "Param3"
         Direction       =   1
         Precision       =   10
         Scale           =   0
         Size            =   4
         DataType        =   3
         HostType        =   3
         Required        =   -1  'True
      EndProperty
      BeginProperty P4 
         RealName        =   "Param4"
         Direction       =   1
         Precision       =   10
         Scale           =   0
         Size            =   4
         DataType        =   3
         HostType        =   3
         Required        =   -1  'True
      EndProperty
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset8 
      CommandName     =   "cmdRotuloF479"
      CommDispId      =   1091
      RsDispId        =   1095
      CommandText     =   "select 1"
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   1
      BeginProperty Field1 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
      EndProperty
      NumGroups       =   0
      ParamCount      =   0
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset9 
      CommandName     =   "cmdVentasMes"
      CommDispId      =   1109
      RsDispId        =   1113
      CommandText     =   $"Dte.dsx":0BEB
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      IsRSReturning   =   -1  'True
      NumFields       =   5
      BeginProperty Field1 
         Precision       =   0
         Size            =   30
         Scale           =   0
         Type            =   202
         Name            =   "Dia"
         Caption         =   "Dia"
      EndProperty
      BeginProperty Field2 
         Precision       =   0
         Size            =   30
         Scale           =   0
         Type            =   202
         Name            =   "Mes"
         Caption         =   "Mes"
      EndProperty
      BeginProperty Field3 
         Precision       =   0
         Size            =   30
         Scale           =   0
         Type            =   202
         Name            =   "anio"
         Caption         =   "anio"
      EndProperty
      BeginProperty Field4 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "Vendido"
         Caption         =   "Vendido"
      EndProperty
      BeginProperty Field5 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "Cobrado"
         Caption         =   "Cobrado"
      EndProperty
      NumGroups       =   0
      ParamCount      =   0
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
   BeginProperty Recordset10 
      CommandName     =   "cmdRecibo"
      CommDispId      =   1119
      RsDispId        =   1147
      CommandText     =   $"Dte.dsx":0DA6
      ActiveConnectionName=   "Conexion"
      CommandType     =   1
      Expanded        =   -1  'True
      IsRSReturning   =   -1  'True
      NumFields       =   9
      BeginProperty Field1 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   20
         Name            =   "rec_numero"
         Caption         =   "rec_numero"
      EndProperty
      BeginProperty Field2 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "rec_fecha"
         Caption         =   "rec_fecha"
      EndProperty
      BeginProperty Field3 
         Precision       =   10
         Size            =   4
         Scale           =   0
         Type            =   3
         Name            =   "id_cliente"
         Caption         =   "id_cliente"
      EndProperty
      BeginProperty Field4 
         Precision       =   0
         Size            =   200
         Scale           =   0
         Type            =   202
         Name            =   "nombreorazonsocial"
         Caption         =   "nombreorazonsocial"
      EndProperty
      BeginProperty Field5 
         Precision       =   0
         Size            =   8000
         Scale           =   0
         Type            =   200
         Name            =   "rec_importe"
         Caption         =   "rec_importe"
      EndProperty
      BeginProperty Field6 
         Precision       =   0
         Size            =   200
         Scale           =   0
         Type            =   202
         Name            =   "rec_concepto"
         Caption         =   "rec_concepto"
      EndProperty
      BeginProperty Field7 
         Precision       =   0
         Size            =   13
         Scale           =   0
         Type            =   200
         Name            =   "fac_numero"
         Caption         =   "fac_numero"
      EndProperty
      BeginProperty Field8 
         Precision       =   23
         Size            =   16
         Scale           =   3
         Type            =   135
         Name            =   "fac_fecha"
         Caption         =   "fac_fecha"
      EndProperty
      BeginProperty Field9 
         Precision       =   19
         Size            =   8
         Scale           =   0
         Type            =   6
         Name            =   "fac_monto"
         Caption         =   "fac_monto"
      EndProperty
      NumGroups       =   0
      ParamCount      =   1
      BeginProperty P1 
         RealName        =   "Param1"
         Direction       =   1
         Precision       =   19
         Scale           =   0
         Size            =   8
         DataType        =   20
         HostType        =   5
         Required        =   -1  'True
      EndProperty
      RelationCount   =   0
      AggregateCount  =   0
   EndProperty
End
Attribute VB_Name = "Dte"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Attribute VB_Ext_KEY = "RVB_ModelStereotype" ,"DataEnvironment"


Private Sub Conexion_WillConnect(ConnectionString As String, UserID As String, Password As String, Options As Long, adStatus As ADODB.EventStatusEnum, ByVal pConnection As ADODB.Connection)
ConnectionString = frmLogin.gCadenaConexion
End Sub


